﻿
'
Public Class ContactSearchResult

#Region " Declarations "

    Private _intId As Integer
    Private _strFirstName As String = String.Empty
    Private _strLastName As String = String.Empty

#End Region

#Region " Properties "

    Public Property FirstName() As String
        Get
            Return _strFirstName
        End Get
        Set(ByVal Value As String)
            _strFirstName = Value
        End Set
    End Property

    Public ReadOnly Property FullName() As String
        Get
            Return String.Concat(_strFirstName, " ", _strLastName)
        End Get
    End Property

    Public Property Id() As Integer
        Get
            Return _intId
        End Get
        Set(ByVal Value As Integer)
            _intId = Value
        End Set
    End Property

    Public Property LastName() As String
        Get
            Return _strLastName
        End Get
        Set(ByVal Value As String)
            _strLastName = Value
        End Set
    End Property

#End Region

#Region " Constructor "

    Public Sub New()
    End Sub

    Public Sub New(ByVal intId As Integer, ByVal strFirstName As String, ByVal strLastName As String)
        _intId = intId
        _strFirstName = strFirstName
        _strLastName = strLastName
    End Sub

#End Region

End Class
